DirectX w VB cz.4
Nareszcie czwarta i ostatnia część artykułu DirectX w VB. Znajdziesz tu omówienie BioHazard Engine z dziedzin: DirectSound, DirectMusic, DirectInput.
Ponieważ myślę, że zapoznaliście się już z zasadami programowania DirectX, to nie będę się tutaj rozpisywał.
Jak zwykle dodajemy w Project/References dx7vb.dll, i wszystkie moduły BioHazard'u.
BioHazard - DirectSound
SoundBuffer to zmienna identyfikująca dany plik.
Dim mybuff As DirectSoundBuffer
'tworzymy zmienną która będzie identyfikowana z
plikiem hello.wav
DSInit Me 'inicjujemy DSound
DSLoadWav mybuff, "c:\hello.wav" 'ładujemy
do zmiennej mybuff pliczek c:\hello.wav
DSSetVolume mybuff, 50 'zmieniamy głośność
mybuff (hello.wav) na 50%
---
Graj:
DSPlayWav 'gramy
---
Stop:
DSStopWav 'stopujemy
---
Właściwie to wszystko co może zaoferować BioHazard w tej dziedzinie :-(
BioHazard - DirectMusic
Tutaj - jako, że tylko jeden plik MIDI może grać naraz, to nie ma soundbuffer'ów.
DMInit
'inicjujemy
DMLoadSong "c:\piosnka.mid" 'ładujemy
jakiś plik, np. c:\piosnka.mid
DMPlaySong 'gramy
Aby zkończyć grać:
DMStopSong
By wyładować DMusic
DMUnload
BioHazard - DirectInput
Inicjujemy
DIinit
Funkcja dająca stan myszy w zmiennej:
DIGetMousState 'zwraca w AbsoluteX i AbsoluteY
Funkcja dające stan klawiatury w zmiennej:
DIGetKeyboardState 'zwraca w KeyboardState
To już wszystko co mogę zaoferować wam z dziedziny DirectX.
Mam nadzieję, że wkrótce zrobicie jakieś fajne programiki używające DirectX!
Masz jakieś pytanie? Pisz na e-mail.
<-DoogiE->